library(data.table)
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:data.table':
## 
##     between, first, last
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
library(ggplot2)
library(tidyr)
setwd("~/buckets/b1/")   #Establezco el Working Directory
kdataset       <- "./datasets/paquete_premium_ext_722.csv.gz"
dataset =  fread(kdataset, stringsAsFactors= TRUE)
df = dataset[ foto_mes==202011, ]

df_numeric = df %>% dplyr::select_if(is.numeric)
df_numeric = as_tibble(df_numeric)
var_target = df %>% dplyr::select(clase_ternaria) #%>% 
  # mutate(clase_ternaria = case_when(
  #   clase_ternaria == "CONTINUA"  ~ 1,
  #   clase_ternaria == 'BAJA+1' ~ -1,
  #   clase_ternaria == 'BAJA+2' ~ -2))
activo_boxplot = T
df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(1:20) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 159388 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(21:40) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 360454 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(41:60) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 86703 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(61:80) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 46100 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(81:100) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 74232 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(101:120) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 83194 rows containing non-finite values (stat_boxplot).

summary(df)
##  numero_de_cliente     foto_mes         internet       mactivos_margen    
##  Min.   : 4572300   Min.   :202011   Min.   :0.00000   Min.   :-177929.3  
##  1st Qu.:15810564   1st Qu.:202011   1st Qu.:0.00000   1st Qu.:  -1584.3  
##  Median :24635650   Median :202011   Median :0.00000   Median :   -466.4  
##  Mean   :26175775   Mean   :202011   Mean   :0.03544   Mean   :   -992.5  
##  3rd Qu.:35734200   3rd Qu.:202011   3rd Qu.:0.00000   3rd Qu.:      0.0  
##  Max.   :61449669   Max.   :202011   Max.   :3.00000   Max.   : 239812.4  
##                                                                           
##  mpasivos_margen       cproductos     mcuenta_corriente   ccaja_ahorro   
##  Min.   : -38457.4   Min.   : 3.000   Min.   :-1368971   Min.   : 2.000  
##  1st Qu.:    234.8   1st Qu.: 7.000   1st Qu.:    -702   1st Qu.: 2.000  
##  Median :    655.5   Median : 7.000   Median :       0   Median : 2.000  
##  Mean   :   1614.6   Mean   : 7.553   Mean   :    3162   Mean   : 2.128  
##  3rd Qu.:   1552.9   3rd Qu.: 8.000   3rd Qu.:       0   3rd Qu.: 2.000  
##  Max.   :1473863.4   Max.   :18.000   Max.   :15900501   Max.   :10.000  
##                                                                          
##   mcaja_ahorro      mdescubierto_preacordado mcuentas_saldo     
##  Min.   :  -17889   Min.   :0.000            Min.   : -1343701  
##  1st Qu.:    4795   1st Qu.:1.170            1st Qu.:      864  
##  Median :   19325   Median :1.170            Median :    29952  
##  Mean   :   69173   Mean   :1.131            Mean   :   175089  
##  3rd Qu.:   56797   3rd Qu.:1.170            3rd Qu.:   118242  
##  Max.   :91519566   Max.   :1.170            Max.   :113020344  
##                                                                 
##  ctarjeta_visa_trx mtarjeta_visa_consumo mprestamos_personales
##  Min.   :  0.00    Min.   :      0       Min.   :      0      
##  1st Qu.:  2.00    1st Qu.:   3981       1st Qu.:      0      
##  Median :  8.00    Median :  15572       Median :      0      
##  Mean   : 11.73    Mean   :  28262       Mean   :  25347      
##  3rd Qu.: 16.00    3rd Qu.:  35556       3rd Qu.:      0      
##  Max.   :241.00    Max.   :2235062       Max.   :4564839      
##                                                               
##   cpayroll_trx        mpayroll        mcuenta_debitos_automaticos
##  Min.   : 0.0000   Min.   :       0   Min.   :       0           
##  1st Qu.: 0.0000   1st Qu.:       0   1st Qu.:       0           
##  Median : 1.0000   Median :    7349   Median :       0           
##  Mean   : 0.8504   Mean   :   55065   Mean   :    7311           
##  3rd Qu.: 1.0000   3rd Qu.:   84154   3rd Qu.:    3088           
##  Max.   :64.0000   Max.   :37735106   Max.   :39325005           
##                                                                  
##  mpagomiscuentas    mcomisiones_mantenimiento mtransferencias_recibidas
##  Min.   :       0   Min.   :-13097.2          Min.   :        0        
##  1st Qu.:       0   1st Qu.:     0.0          1st Qu.:        0        
##  Median :       0   Median :     0.0          Median :    29346        
##  Mean   :   13349   Mean   :   417.1          Mean   :   115842        
##  3rd Qu.:    9841   3rd Qu.:   961.6          3rd Qu.:    92113        
##  Max.   :19996039   Max.   :  6041.4          Max.   :167156466        
##                                                                        
##  chomebanking_trx    ctrx_quarter     tmobile_app      Master_fechaalta
##  Min.   :    0.00   Min.   :   0.0   Min.   :0.00000   Min.   :   1    
##  1st Qu.:    4.00   1st Qu.:  54.0   1st Qu.:0.00000   1st Qu.: 852    
##  Median :   26.00   Median :  96.0   Median :0.00000   Median :2128    
##  Mean   :   51.03   Mean   : 110.6   Mean   :0.04098   Mean   :2473    
##  3rd Qu.:   71.00   3rd Qu.: 146.0   3rd Qu.:0.00000   3rd Qu.:3721    
##  Max.   :11623.00   Max.   :3293.0   Max.   :1.00000   Max.   :7481    
##                                                        NA's   :15108   
##   Visa_status   Visa_mfinanciacion_limite Visa_fultimo_cierre      mes    
##  Min.   :0.00   Min.   :      336         Min.   :   5.000    Min.   :11  
##  1st Qu.:0.00   1st Qu.:   101088         1st Qu.:   5.000    1st Qu.:11  
##  Median :0.00   Median :   176904         Median :   5.000    Median :11  
##  Mean   :0.12   Mean   :   352055         Mean   :   9.164    Mean   :11  
##  3rd Qu.:0.00   3rd Qu.:   447180         3rd Qu.:  12.000    3rd Qu.:11  
##  Max.   :9.00   Max.   :218045037         Max.   :4954.000    Max.   :11  
##  NA's   :6614   NA's   :6614              NA's   :6717                    
##  ctrx_quarter_normalizado mpayroll_sobre_edad  mv_status07     
##  Min.   :   0.0           Min.   :     0.0    Min.   : 0.0000  
##  1st Qu.:  55.0           1st Qu.:     0.0    1st Qu.: 0.0000  
##  Median :  97.0           Median :   165.9    Median : 0.0000  
##  Mean   : 110.7           Mean   :  1321.9    Mean   : 0.4428  
##  3rd Qu.: 146.0           3rd Qu.:  2059.6    3rd Qu.: 0.0000  
##  Max.   :3293.0           Max.   :490066.3    Max.   :10.0000  
##                                                                
##  mv_Fvencimiento    mv_Finiciomora   mv_msaldototal     mv_fultimo_cierre
##  Min.   :-2914299   Min.   : 0.00    Min.   :-1192365   Min.   :   5.00  
##  1st Qu.:   -1825   1st Qu.: 0.00    1st Qu.:    4475   1st Qu.:   5.00  
##  Median :   -1460   Median : 0.00    Median :   17538   Median :   5.00  
##  Mean   :  -11829   Mean   : 7.94    Mean   :   35437   Mean   :  11.77  
##  3rd Qu.:   -1003   3rd Qu.:15.00    3rd Qu.:   41723   3rd Qu.:  12.00  
##  Max.   :    5053   Max.   :57.00    Max.   : 5002739   Max.   :4954.00  
##  NA's   :5545       NA's   :154824                      NA's   :5644     
##  mv_mpagominimo    mvr_mpagominimo    cproductos_sobre_edad
##  Min.   :      0   Min.   :0.000000   Min.   :0.04082      
##  1st Qu.:    351   1st Qu.:0.000661   1st Qu.:0.13333      
##  Median :   1930   Median :0.004083   Median :0.16667      
##  Mean   :   6628   Mean   :0.015532   Mean   :0.17435      
##  3rd Qu.:   5183   3rd Qu.:0.012852   3rd Qu.:0.20690      
##  Max.   :4398053   Max.   :7.115543   Max.   :0.55000      
##                                                            
##  mcomisiones_sobre_edad mactivos_margen_sobre_edad mpasivos_margen_sobre_edad
##  Min.   :-1628.041      Min.   :-4398.81           Min.   :-1424.35          
##  1st Qu.:    5.605      1st Qu.:  -36.20           1st Qu.:    5.28          
##  Median :   17.538      Median :  -10.21           Median :   14.87          
##  Mean   :   26.106      Mean   :  -22.99           Mean   :   34.74          
##  3rd Qu.:   35.856      3rd Qu.:    0.00           3rd Qu.:   34.73          
##  Max.   : 4168.341      Max.   : 5753.45           Max.   :58954.54          
##                                                                              
##  internet_lag1    cpayroll_trx_lag1    mes_lag1    mrentabilidad_exp_lag1
##  Min.   :0.0000   Min.   : 0.0000   Min.   : 2     Min.   :0.000e+00     
##  1st Qu.:0.5000   1st Qu.: 0.0000   1st Qu.:10     1st Qu.:3.261e+05     
##  Median :0.5000   Median : 1.0000   Median :10     Median :2.082e+06     
##  Mean   :0.4836   Mean   : 0.8386   Mean   :10     Mean   :4.886e+07     
##  3rd Qu.:0.5000   3rd Qu.: 1.0000   3rd Qu.:10     3rd Qu.:9.139e+06     
##  Max.   :2.5000   Max.   :68.0000   Max.   :12     Max.   :2.746e+11     
##  NA's   :1486     NA's   :1486      NA's   :1486   NA's   :1486          
##  mcaja_ahorro_dolares_delta1 mdescubierto_preacordado_delta1
##  Min.   :-19028814           Min.   :-1.1700                
##  1st Qu.:        0           1st Qu.: 0.0000                
##  Median :        0           Median : 0.0000                
##  Mean   :    -1051           Mean   :-0.0005                
##  3rd Qu.:      695           3rd Qu.: 0.0000                
##  Max.   : 40376065           Max.   : 1.1700                
##  NA's   :1486                NA's   :1486                   
##  mcuentas_saldo_delta1 chomebanking_trx_delta1 ctrx_quarter_delta1
##  Min.   :-45370098     Min.   :-1492.000       Min.   :-700.000   
##  1st Qu.:   -11839     1st Qu.:  -18.000       1st Qu.:  -4.000   
##  Median :        0     Median :   -1.000       Median :   1.000   
##  Mean   :     3979     Mean   :   -7.073       Mean   :   1.869   
##  3rd Qu.:    13989     3rd Qu.:    5.000       3rd Qu.:   8.000   
##  Max.   : 92618385     Max.   : 2178.000       Max.   : 517.000   
##  NA's   :1486          NA's   :1486            NA's   :1486       
##  cliente_edad_lag2 mcuentas_saldo_lag2 ccaja_seguridad_lag2 cpayroll_trx_lag2
##  Min.   : 18.00    Min.   : -1343701   Min.   :0.000        Min.   : 0.000   
##  1st Qu.: 37.00    1st Qu.:     1771   1st Qu.:0.000        1st Qu.: 0.000   
##  Median : 45.00    Median :    35643   Median :0.000        Median : 1.000   
##  Mean   : 46.42    Mean   :   183136   Mean   :0.086        Mean   : 0.842   
##  3rd Qu.: 55.00    3rd Qu.:   127884   3rd Qu.:0.000        3rd Qu.: 1.000   
##  Max.   :100.00    Max.   :106063380   Max.   :7.000        Max.   :62.000   
##  NA's   :3306      NA's   :3306        NA's   :3306         NA's   :3306     
##  cmobile_app_trx_lag2 Master_Fvencimiento_lag2 Master_fechaalta_lag2
##  Min.   :   0.00      Min.   :-2914360         Min.   :   1         
##  1st Qu.:   0.00      1st Qu.:   -1521         1st Qu.: 875         
##  Median :  16.00      Median :    -880         Median :2123         
##  Mean   :  39.21      Mean   :   -1091         Mean   :2456         
##  3rd Qu.:  56.00      3rd Qu.:    -637         3rd Qu.:3690         
##  Max.   :2156.00      Max.   :    6668         Max.   :7420         
##  NA's   :3327         NA's   :17596            NA's   :17596        
##  Visa_mfinanciacion_limite_lag2 Visa_Fvencimiento_lag2    mes_lag2   
##  Min.   :        0              Min.   :-2914360       Min.   : 1    
##  1st Qu.:   101088              1st Qu.:   -1825       1st Qu.: 9    
##  Median :   176904              Median :   -1399       Median : 9    
##  Mean   :   343226              Mean   :  -12215       Mean   : 9    
##  3rd Qu.:   427886              3rd Qu.:    -941       3rd Qu.: 9    
##  Max.   :229793558              Max.   :    5633       Max.   :12    
##  NA's   :9140                   NA's   :9140           NA's   :3306  
##  cproductos_sobre_edad_lag2 mcuenta_corriente_delta2 mcaja_ahorro_delta2
##  Min.   :0.041              Min.   :-7138713         Min.   :-10926206  
##  1st Qu.:0.134              1st Qu.:    -209         1st Qu.:    -8391  
##  Median :0.167              Median :       0         Median :        0  
##  Mean   :0.176              Mean   :    -369         Mean   :     1686  
##  3rd Qu.:0.209              3rd Qu.:       0         3rd Qu.:     9746  
##  Max.   :0.571              Max.   : 6353185         Max.   : 91515647  
##  NA's   :3306               NA's   :3306             NA's   :3306       
##  mcuentas_saldo_delta2 cprestamos_personales_delta2
##  Min.   :-24602426     Min.   :-42.000             
##  1st Qu.:   -18842     1st Qu.:  0.000             
##  Median :      -96     Median :  0.000             
##  Mean   :    -5819     Mean   :  0.042             
##  3rd Qu.:    16531     3rd Qu.:  0.000             
##  Max.   : 94597926     Max.   : 73.000             
##  NA's   :3306          NA's   :3306                
##  mprestamos_personales_delta2 chomebanking_trx_delta2 mv_status07_delta2
##  Min.   :-1474453             Min.   :-1752.000       Min.   :-10.000   
##  1st Qu.:       0             1st Qu.:  -17.000       1st Qu.:  0.000   
##  Median :       0             Median :    0.000       Median :  0.000   
##  Mean   :    1655             Mean   :   -4.572       Mean   :  0.077   
##  3rd Qu.:       0             3rd Qu.:    7.000       3rd Qu.:  0.000   
##  Max.   : 1755000             Max.   : 5032.000       Max.   : 10.000   
##  NA's   :3306                 NA's   :3306            NA's   :3306      
##  cproductos_sobre_edad_delta2 internet_tend6    internet_avg6   
##  Min.   :-0.250               Min.   :-1.0000   Min.   :0.0000  
##  1st Qu.: 0.000               1st Qu.:-0.1857   1st Qu.:0.7500  
##  Median : 0.000               Median :-0.1857   Median :0.7500  
##  Mean   :-0.002               Mean   :-0.1717   Mean   :0.7014  
##  3rd Qu.: 0.000               3rd Qu.:-0.1857   3rd Qu.:0.7500  
##  Max.   : 0.174               Max.   : 1.0000   Max.   :1.5000  
##  NA's   :3306                 NA's   :1486      NA's   :1486    
##  cliente_edad_avg6 mrentabilidad_tend6 mrentabilidad_avg6
##  Min.   : 18.00    Min.   :-68266.85   Min.   :-63475.0  
##  1st Qu.: 36.33    1st Qu.:  -260.31   1st Qu.:   208.2  
##  Median : 44.33    Median :   -23.17   Median :  1138.2  
##  Mean   : 46.30    Mean   :   -26.14   Mean   :  2104.3  
##  3rd Qu.: 55.00    3rd Qu.:   172.93   3rd Qu.:  2612.2  
##  Max.   :100.00    Max.   :260032.60   Max.   :363150.8  
##  NA's   :1486      NA's   :1486        NA's   :1486      
##  mrentabilidad_annual_tend6 mactivos_margen_tend6 cproductos_tend6 
##  Min.   :-652159.7          Min.   :-40026.81     Min.   :-2.0000  
##  1st Qu.:  -1356.3          1st Qu.:  -188.36     1st Qu.: 0.0000  
##  Median :    -75.1          Median :   -21.12     Median : 0.0000  
##  Mean   :   -473.9          Mean   :   -97.20     Mean   :-0.0079  
##  3rd Qu.:    901.3          3rd Qu.:    42.75     3rd Qu.: 0.0000  
##  Max.   : 281649.8          Max.   : 31030.76     Max.   : 2.0000  
##  NA's   :1486               NA's   :1486          NA's   :1486     
##  mcuenta_corriente_tend6 mcuenta_corriente_avg6 mcaja_ahorro_avg6 
##  Min.   :-3810949        Min.   :-1147311       Min.   :   -4896  
##  1st Qu.:     -93        1st Qu.:    -730       1st Qu.:    7705  
##  Median :       0        Median :     -26       Median :   24443  
##  Mean   :    -208        Mean   :    3685       Mean   :   70669  
##  3rd Qu.:       0        3rd Qu.:       0       3rd Qu.:   65287  
##  Max.   : 2042077        Max.   :12041950       Max.   :16758768  
##  NA's   :1486            NA's   :1486           NA's   :1486      
##  mdescubierto_preacordado_tend6 mcuentas_saldo_tend6 ctarjeta_visa_trx_tend6
##  Min.   :-1.1700                Min.   :-6426710     Min.   :-42.5714       
##  1st Qu.: 0.0000                1st Qu.:   -7113     1st Qu.: -0.2000       
##  Median : 0.0000                Median :    -398     Median :  0.0429       
##  Mean   :-0.0007                Mean   :   -4260     Mean   :  0.3471       
##  3rd Qu.: 0.0000                3rd Qu.:    4239     3rd Qu.:  0.7000       
##  Max.   : 1.1700                Max.   :20904874     Max.   : 49.0000       
##  NA's   :1486                   NA's   :1486         NA's   :1486           
##  cprestamos_personales_tend6 mprestamos_personales_tend6
##  Min.   :-26.6000            Min.   :-212659.0          
##  1st Qu.:  0.0000            1st Qu.:      0.0          
##  Median :  0.0000            Median :      0.0          
##  Mean   :  0.0204            Mean   :    732.7          
##  3rd Qu.:  0.0000            3rd Qu.:      0.0          
##  Max.   : 44.0714            Max.   : 742877.1          
##  NA's   :1486                NA's   :1486               
##  ccomisiones_mantenimiento_tend6 mcomisiones_mantenimiento_tend6
##  Min.   :-15.5000                Min.   :-8203.030              
##  1st Qu.:  0.0000                1st Qu.:    0.000              
##  Median :  0.0000                Median :    0.000              
##  Mean   : -0.0006                Mean   :    4.123              
##  3rd Qu.:  0.0000                3rd Qu.:    0.000              
##  Max.   :  6.0000                Max.   : 2095.637              
##  NA's   :1486                    NA's   :1486                   
##  mcomisiones_mantenimiento_avg6 ctransferencias_recibidas_tend6
##  Min.   :-4902.4                Min.   :-76.0000               
##  1st Qu.:    0.0                1st Qu.: -0.2286               
##  Median :    0.0                Median :  0.0000               
##  Mean   :  398.9                Mean   : -0.0453               
##  3rd Qu.:  680.7                3rd Qu.:  0.1429               
##  Max.   : 5041.3                Max.   : 84.0000               
##  NA's   :1486                   NA's   :1486                   
##  ctransferencias_recibidas_avg6 mtransferencias_emitidas_avg6 tcallcenter_tend6
##  Min.   :   0.0000              Min.   :       0              Min.   :-1.0000  
##  1st Qu.:   0.8333              1st Qu.:       0              1st Qu.: 0.0000  
##  Median :   2.0000              Median :   12883              Median : 0.0000  
##  Mean   :   3.4913              Mean   :   56839              Mean   :-0.0056  
##  3rd Qu.:   3.8333              3rd Qu.:   44195              3rd Qu.: 0.0000  
##  Max.   :1142.1667              Max.   :39898739              Max.   : 1.0000  
##  NA's   :1486                   NA's   :1486                  NA's   :1486     
##  thomebanking_avg6 chomebanking_trx_tend6 chomebanking_trx_avg6
##  Min.   :0.0000    Min.   :-1099.4429     Min.   :    0.000    
##  1st Qu.:0.6667    1st Qu.:   -5.8857     1st Qu.:    8.917    
##  Median :1.0000    Median :   -0.8714     Median :   35.083    
##  Mean   :0.7856    Mean   :   -2.8108     Mean   :   58.931    
##  3rd Qu.:1.0000    3rd Qu.:    0.8571     3rd Qu.:   82.167    
##  Max.   :1.0000    Max.   :  392.7000     Max.   :10678.667    
##  NA's   :1486      NA's   :1486           NA's   :1486         
##  ctrx_quarter_tend6 Master_Fvencimiento_avg6 Visa_status_avg6
##  Min.   :-196.886   Min.   :-2914436.5       Min.   :0.000   
##  1st Qu.:   1.657   1st Qu.:   -1506.2       1st Qu.:0.000   
##  Median :   5.600   Median :    -926.2       Median :0.000   
##  Mean   :   7.401   Mean   :   -1129.0       Mean   :0.042   
##  3rd Qu.:  11.114   3rd Qu.:    -652.2       3rd Qu.:0.000   
##  Max.   : 480.714   Max.   :    6652.8       Max.   :9.000   
##  NA's   :1486       NA's   :15380            NA's   :6905    
##  Visa_mpagospesos_tend6 Visa_fechaalta_tend6 Visa_cconsumos_tend6
##  Min.   :-650685.3      Min.   :-2163.70     Min.   :-66.229     
##  1st Qu.:  -2850.1      1st Qu.:   30.60     1st Qu.: -0.429     
##  Median :   -697.7      Median :   30.60     Median :  0.000     
##  Mean   :  -1865.6      Mean   :   30.39     Mean   : -0.017     
##  3rd Qu.:    358.7      3rd Qu.:   30.60     3rd Qu.:  0.314     
##  Max.   : 168950.7      Max.   : 1226.94     Max.   : 48.000     
##  NA's   :21266          NA's   :6905         NA's   :21266       
##  Visa_cconsumos_avg6    mes_avg6      ctrx_quarter_normalizado_tend6
##  Min.   :  0.000     Min.   : 4.200   Min.   :-196.886              
##  1st Qu.:  2.333     1st Qu.: 8.500   1st Qu.:   1.600              
##  Median :  5.500     Median : 8.500   Median :   5.543              
##  Mean   :  8.034     Mean   : 8.561   Mean   :   7.322              
##  3rd Qu.: 10.667     3rd Qu.: 8.500   3rd Qu.:  11.057              
##  Max.   :351.667     Max.   :10.500   Max.   : 480.714              
##  NA's   :21266       NA's   :1486     NA's   :1486                  
##  mv_status01_tend6 mv_status01_avg6 mv_status07_tend6 mv_Fvencimiento_tend6
##  Min.   :-9.000    Min.   :0.00     Min.   :-9.0000   Min.   :-582415.7    
##  1st Qu.: 0.000    1st Qu.:0.00     1st Qu.: 0.0000   1st Qu.:     30.6    
##  Median : 0.000    Median :0.00     Median : 0.0000   Median :     30.6    
##  Mean   : 0.041    Mean   :0.06     Mean   : 0.0246   Mean   :    188.6    
##  3rd Qu.: 0.000    3rd Qu.:0.00     3rd Qu.: 0.0000   3rd Qu.:     30.6    
##  Max.   : 9.000    Max.   :9.00     Max.   : 9.0000   Max.   :2912169.0    
##  NA's   :6124      NA's   :6124     NA's   :1486      NA's   :6124         
##  mv_mpagospesos_tend6 cproductos_sobre_edad_tend6
##  Min.   :-442255.4    Min.   :-8e-02             
##  1st Qu.:  -2748.4    1st Qu.:-1e-03             
##  Median :   -455.2    Median :-2e-04             
##  Mean   :  -1897.9    Mean   :-6e-04             
##  3rd Qu.:    158.1    3rd Qu.: 0e+00             
##  Max.   : 298949.0    Max.   : 8e-02             
##  NA's   :1486         NA's   :1486               
##  mrentabilidad_annual_sobre_edad_tend6 mcomisiones_sobre_edad_avg6
##  Min.   :-10546.297                    Min.   :-849.618           
##  1st Qu.:   -32.234                    1st Qu.:   7.618           
##  Median :    -2.253                    Median :  17.589           
##  Mean   :   -10.955                    Mean   :  24.373           
##  3rd Qu.:    19.163                    3rd Qu.:  32.970           
##  Max.   : 11265.991                    Max.   :2543.451           
##  NA's   :1486                          NA's   :1486               
##  mactivos_margen_sobre_edad_avg6 mrentabilidad_annual_exp_tend6
##  Min.   :-1992.738               Min.   :-2.419e+12            
##  1st Qu.:  -26.385               1st Qu.:-2.540e+07            
##  Median :   -7.776               Median : 5.990e+05            
##  Mean   :  -12.120               Mean   :-9.182e+07            
##  3rd Qu.:    0.022               3rd Qu.: 3.267e+07            
##  Max.   : 5697.352               Max.   : 1.434e+12            
##  NA's   :1486                    NA's   :1486                  
##  cliente_edad_avg3 mactivos_margen_avg3 mpasivos_margen_avg3 cproductos_tend3 
##  Min.   : 18.00    Min.   :-127526.9    Min.   :-23491.8     Min.   :-3.0000  
##  1st Qu.: 36.67    1st Qu.:  -1305.5    1st Qu.:   223.1     1st Qu.: 0.0000  
##  Median : 44.67    Median :   -392.4    Median :   583.7     Median : 0.0000  
##  Mean   : 46.44    Mean   :   -625.9    Mean   :  1378.4     Mean   :-0.0215  
##  3rd Qu.: 55.00    3rd Qu.:      0.0    3rd Qu.:  1348.9     3rd Qu.: 0.0000  
##  Max.   :100.00    Max.   : 199181.8    Max.   :538843.9     Max.   : 2.5000  
##  NA's   :1486      NA's   :1486         NA's   :1486         NA's   :1486     
##  mcuenta_corriente_tend3 mcuenta_corriente_avg3 ccaja_ahorro_avg3
##  Min.   :-3569356        Min.   :-1366688       Min.   : 2.000   
##  1st Qu.:    -104        1st Qu.:    -778       1st Qu.: 2.000   
##  Median :       0        Median :      -4       Median : 2.000   
##  Mean   :    -187        Mean   :    3387       Mean   : 2.129   
##  3rd Qu.:       0        3rd Qu.:       0       3rd Qu.: 2.000   
##  Max.   : 3176593        Max.   :13341845       Max.   :10.000   
##  NA's   :1486            NA's   :1486           NA's   :1486     
##  mcaja_ahorro_avg3  mtarjeta_visa_consumo_avg3 cpayroll_trx_avg3
##  Min.   :   -9633   Min.   :      0            Min.   : 0.0000  
##  1st Qu.:    6562   1st Qu.:   4803            1st Qu.: 0.0000  
##  Median :   21914   Median :  16290            Median : 1.0000  
##  Mean   :   69719   Mean   :  27513            Mean   : 0.8437  
##  3rd Qu.:   60372   3rd Qu.:  35517            3rd Qu.: 1.3333  
##  Max.   :33469832   Max.   :1589061            Max.   :60.6667  
##  NA's   :1486       NA's   :1486               NA's   :1486     
##     mes_avg3       clase_ternaria  
##  Min.   : 4.667           :     0  
##  1st Qu.:10.000   BAJA+1  :   511  
##  Median :10.000   BAJA+2  :   648  
##  Mean   :10.006   CONTINUA:158229  
##  3rd Qu.:10.000                    
##  Max.   :11.333                    
##  NA's   :1486

Otra muestra foto mes

df = dataset[ foto_mes==201911, ]

df_numeric = df %>% dplyr::select_if(is.numeric)
df_numeric = as_tibble(df_numeric)
var_target = df %>% dplyr::select(clase_ternaria) #%>% 
  # mutate(clase_ternaria = case_when(
  #   clase_ternaria == "CONTINUA"  ~ 1,
  #   clase_ternaria == 'BAJA+1' ~ -1,
  #   clase_ternaria == 'BAJA+2' ~ -2))
activo_boxplot = T
df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(1:20) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 137286 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(21:40) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 311778 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(41:60) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 112560 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(61:80) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 73631 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(81:100) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 86653 rows containing non-finite values (stat_boxplot).

df_numeric %>% 
  #dplyr::select(var_elegidas) %>% 
  dplyr::select(101:120) %>% 
  scale( center = TRUE, scale = TRUE) %>%  # Se escalan las variables, (x-median)/sd.
  bind_cols(var_target) %>%  
  pivot_longer(names_to = 'variables', values_to = 'cantidad', -clase_ternaria) %>% 
  rename(grupo = clase_ternaria) %>% 
  ggplot(aes(x=variables, y=cantidad, color=as.factor(grupo))) + 
  geom_boxplot() +
  #stat_summary(fun.y=mean, geom="point", color="red") +
  facet_wrap(~variables, scales = 'free') +
  labs(title = "Boxplot por grupo con variables escaladas")
## Warning: Removed 90046 rows containing non-finite values (stat_boxplot).

summary(df)
##  numero_de_cliente     foto_mes         internet      mactivos_margen    
##  Min.   : 4572300   Min.   :201911   Min.   :0.0000   Min.   :-107161.1  
##  1st Qu.:14973977   1st Qu.:201911   1st Qu.:1.0000   1st Qu.:  -1285.6  
##  Median :22931074   Median :201911   Median :1.0000   Median :   -373.4  
##  Mean   :24464962   Mean   :201911   Mean   :0.9102   Mean   :   -518.0  
##  3rd Qu.:33397771   3rd Qu.:201911   3rd Qu.:1.0000   3rd Qu.:      8.7  
##  Max.   :57079516   Max.   :201911   Max.   :1.0000   Max.   : 568198.1  
##                                                                          
##  mpasivos_margen      cproductos     mcuenta_corriente   ccaja_ahorro   
##  Min.   :-36871.1   Min.   : 3.000   Min.   :-1855819   Min.   : 2.000  
##  1st Qu.:   282.2   1st Qu.: 7.000   1st Qu.:    -753   1st Qu.: 2.000  
##  Median :   750.4   Median : 7.000   Median :       0   Median : 2.000  
##  Mean   :  1639.3   Mean   : 7.652   Mean   :    2387   Mean   : 2.106  
##  3rd Qu.:  1672.5   3rd Qu.: 8.000   3rd Qu.:       0   3rd Qu.: 2.000  
##  Max.   :452197.8   Max.   :17.000   Max.   : 9884440   Max.   :10.000  
##                                                                         
##   mcaja_ahorro     mdescubierto_preacordado mcuentas_saldo    
##  Min.   :   -909   Min.   :0.000            Min.   :-3324974  
##  1st Qu.:   3268   1st Qu.:1.170            1st Qu.:     339  
##  Median :  13908   Median :1.170            Median :   22870  
##  Mean   :  40518   Mean   :1.124            Mean   :  161184  
##  3rd Qu.:  37664   3rd Qu.:1.170            3rd Qu.:   99451  
##  Max.   :8808974   Max.   :1.170            Max.   :82552278  
##                                                               
##  ctarjeta_visa_trx mtarjeta_visa_consumo mprestamos_personales
##  Min.   :  0.00    Min.   :      0       Min.   :      0      
##  1st Qu.:  3.00    1st Qu.:   3468       1st Qu.:      0      
##  Median :  9.00    Median :  13087       Median :      0      
##  Mean   : 13.31    Mean   :  24362       Mean   :  26079      
##  3rd Qu.: 18.00    3rd Qu.:  29926       3rd Qu.:   9372      
##  Max.   :233.00    Max.   :1286583       Max.   :5215367      
##                                                               
##   cpayroll_trx        mpayroll        mcuenta_debitos_automaticos
##  Min.   : 0.0000   Min.   :       0   Min.   :      0            
##  1st Qu.: 0.0000   1st Qu.:       0   1st Qu.:      0            
##  Median : 0.0000   Median :       0   Median :      0            
##  Mean   : 0.7947   Mean   :   43135   Mean   :   3127            
##  3rd Qu.: 1.0000   3rd Qu.:   68055   3rd Qu.:   2317            
##  Max.   :25.0000   Max.   :18443633   Max.   :6791850            
##                                                                  
##  mpagomiscuentas    mcomisiones_mantenimiento mtransferencias_recibidas
##  Min.   :       0   Min.   :-11296.8          Min.   :       0         
##  1st Qu.:       0   1st Qu.:     0.0          1st Qu.:       0         
##  Median :       0   Median :     0.0          Median :   11934         
##  Mean   :   10057   Mean   :   364.3          Mean   :   76815         
##  3rd Qu.:    6884   3rd Qu.:  1047.9          3rd Qu.:   63971         
##  Max.   :23085841   Max.   :  4201.8          Max.   :94768381         
##                                                                        
##  chomebanking_trx   ctrx_quarter     tmobile_app    Master_fechaalta
##  Min.   :   0.00   Min.   :   0.0   Min.   :0.000   Min.   :   3    
##  1st Qu.:   4.00   1st Qu.:  57.0   1st Qu.:0.000   1st Qu.:1084    
##  Median :  29.00   Median : 102.0   Median :1.000   Median :2293    
##  Mean   :  52.25   Mean   : 116.7   Mean   :0.562   Mean   :2526    
##  3rd Qu.:  73.00   3rd Qu.: 156.0   3rd Qu.:1.000   3rd Qu.:3681    
##  Max.   :2292.00   Max.   :3341.0   Max.   :1.000   Max.   :7115    
##                                                     NA's   :15375   
##   Visa_status    Visa_mfinanciacion_limite Visa_fultimo_cierre      mes    
##  Min.   :0.000   Min.   :       0          Min.   :   3.000    Min.   :11  
##  1st Qu.:0.000   1st Qu.:   88452          1st Qu.:   3.000    1st Qu.:11  
##  Median :0.000   Median :  176904          Median :   3.000    Median :11  
##  Mean   :0.029   Mean   :  307969          Mean   :   6.874    Mean   :11  
##  3rd Qu.:0.000   3rd Qu.:  353808          3rd Qu.:  10.000    3rd Qu.:11  
##  Max.   :9.000   Max.   :21157718          Max.   :4609.000    Max.   :11  
##  NA's   :4896    NA's   :4896              NA's   :4931                    
##  ctrx_quarter_normalizado mpayroll_sobre_edad  mv_status07     
##  Min.   :   0.0           Min.   :     0      Min.   : 0.0000  
##  1st Qu.:  57.0           1st Qu.:     0      1st Qu.: 0.0000  
##  Median : 102.0           Median :     0      Median : 0.0000  
##  Mean   : 116.9           Mean   :  1040      Mean   : 0.3506  
##  3rd Qu.: 156.0           3rd Qu.:  1667      3rd Qu.: 0.0000  
##  Max.   :3341.0           Max.   :376401      Max.   :10.0000  
##                                                                
##  mv_Fvencimiento    mv_Finiciomora   mv_msaldototal    mv_fultimo_cierre 
##  Min.   :-2914665   Min.   :  3.00   Min.   :-332999   Min.   :   3.000  
##  1st Qu.:   -1796   1st Qu.: 19.00   1st Qu.:   4241   1st Qu.:   3.000  
##  Median :   -1460   Median : 20.00   Median :  15950   Median :   3.000  
##  Mean   :  -13952   Mean   : 25.06   Mean   :  37661   Mean   :   9.446  
##  3rd Qu.:   -1065   3rd Qu.: 24.00   3rd Qu.:  39581   3rd Qu.:  10.000  
##  Max.   :    4718   Max.   :144.00   Max.   :3529598   Max.   :4609.000  
##  NA's   :4416       NA's   :135531                     NA's   :4447      
##  mv_mpagominimo    mvr_mpagominimo    cproductos_sobre_edad
##  Min.   :      0   Min.   :0.000000   Min.   :0.04124      
##  1st Qu.:    316   1st Qu.:0.000655   1st Qu.:0.13415      
##  Median :   1381   Median :0.003333   Median :0.16667      
##  Mean   :   5359   Mean   :0.016436   Mean   :0.17611      
##  3rd Qu.:   3709   3rd Qu.:0.009917   3rd Qu.:0.20930      
##  Max.   :3250038   Max.   :3.538333   Max.   :0.70000      
##                                                            
##  mcomisiones_sobre_edad mactivos_margen_sobre_edad mpasivos_margen_sobre_edad
##  Min.   :-456.353       Min.   :-2280.023          Min.   :-839.12           
##  1st Qu.:   5.272       1st Qu.:  -28.938          1st Qu.:   6.24           
##  Median :  15.681       Median :   -8.103          Median :  17.04           
##  Mean   :  22.929       Mean   :  -11.773          Mean   :  35.25           
##  3rd Qu.:  30.443       3rd Qu.:    0.192          3rd Qu.:  37.73           
##  Max.   :2870.670       Max.   : 9796.519          Max.   :6002.35           
##                                                                              
##  internet_lag1    cpayroll_trx_lag1    mes_lag1      mrentabilidad_exp_lag1
##  Min.   :0.0000   Min.   : 0.0000   Min.   : 1.000   Min.   :0.000e+00     
##  1st Qu.:1.0000   1st Qu.: 0.0000   1st Qu.:10.000   1st Qu.:3.859e+05     
##  Median :1.0000   Median : 0.0000   Median :10.000   Median :2.060e+06     
##  Mean   :0.9147   Mean   : 0.8699   Mean   : 9.999   Mean   :4.932e+07     
##  3rd Qu.:1.0000   3rd Qu.: 1.0000   3rd Qu.:10.000   3rd Qu.:9.007e+06     
##  Max.   :1.0000   Max.   :29.0000   Max.   :10.000   Max.   :2.743e+11     
##  NA's   :2440     NA's   :2440      NA's   :2440     NA's   :2440          
##  mcaja_ahorro_dolares_delta1 mdescubierto_preacordado_delta1
##  Min.   :-57876478           Min.   :-1.1700                
##  1st Qu.:        0           1st Qu.: 0.0000                
##  Median :        0           Median : 0.0000                
##  Mean   :   -15301           Mean   :-0.0027                
##  3rd Qu.:       24           3rd Qu.: 0.0000                
##  Max.   : 14421104           Max.   : 1.1700                
##  NA's   :2440                NA's   :2440                   
##  mcuentas_saldo_delta1 chomebanking_trx_delta1 ctrx_quarter_delta1
##  Min.   :-35017956     Min.   : -43.00         Min.   :-330.0000  
##  1st Qu.:    -7287     1st Qu.:   0.50         1st Qu.:  -7.0000  
##  Median :        5     Median :  12.50         Median :   0.0000  
##  Mean   :     3662     Mean   :  24.23         Mean   :  -0.9634  
##  3rd Qu.:    11043     3rd Qu.:  34.00         3rd Qu.:   5.0000  
##  Max.   : 30269511     Max.   :1144.50         Max.   :1456.0000  
##  NA's   :2440          NA's   :2440            NA's   :2440       
##  cliente_edad_lag2 mcuentas_saldo_lag2 ccaja_seguridad_lag2 cpayroll_trx_lag2
##  Min.   :18.00     Min.   : -843175    Min.   :0.000        Min.   : 0.000   
##  1st Qu.:37.00     1st Qu.:     372    1st Qu.:0.000        1st Qu.: 0.000   
##  Median :45.00     Median :   22858    Median :0.000        Median : 0.000   
##  Mean   :46.56     Mean   :  176683    Mean   :0.095        Mean   : 0.793   
##  3rd Qu.:55.00     3rd Qu.:  104571    3rd Qu.:0.000        3rd Qu.: 1.000   
##  Max.   :99.00     Max.   :79849343    Max.   :7.000        Max.   :20.000   
##  NA's   :5199      NA's   :5199        NA's   :5199         NA's   :5199     
##  cmobile_app_trx_lag2 Master_Fvencimiento_lag2 Master_fechaalta_lag2
##  Min.   :   0.00      Min.   :-2914726         Min.   :   1         
##  1st Qu.:   0.00      1st Qu.:   -1277         1st Qu.:1117         
##  Median :   8.00      Median :   -1065         Median :2330         
##  Mean   :  39.76      Mean   :   -1156         Mean   :2545         
##  3rd Qu.:  54.00      3rd Qu.:    -822         3rd Qu.:3689         
##  Max.   :2136.00      Max.   :    6302         Max.   :7054         
##  NA's   :5237         NA's   :20067            NA's   :20067        
##  Visa_mfinanciacion_limite_lag2 Visa_Fvencimiento_lag2    mes_lag2     
##  Min.   :       0               Min.   :-2914726       Min.   : 1.000  
##  1st Qu.:   88452               1st Qu.:   -1734       1st Qu.: 9.000  
##  Median :  176904               Median :   -1368       Median : 9.000  
##  Mean   :  307497               Mean   :  -14168       Mean   : 8.999  
##  3rd Qu.:  353808               3rd Qu.:    -791       3rd Qu.: 9.000  
##  Max.   :44109689               Max.   :    5267       Max.   :12.000  
##  NA's   :9617                   NA's   :9617           NA's   :5199    
##  cproductos_sobre_edad_lag2 mcuenta_corriente_delta2 mcaja_ahorro_delta2
##  Min.   :0.041              Min.   :-5892731         Min.   :-6044317   
##  1st Qu.:0.136              1st Qu.:    -171         1st Qu.:   -4403   
##  Median :0.170              Median :       0         Median :     110   
##  Mean   :0.179              Mean   :    -353         Mean   :    3017   
##  3rd Qu.:0.212              3rd Qu.:      62         3rd Qu.:    7624   
##  Max.   :0.700              Max.   : 4179708         Max.   : 6569797   
##  NA's   :5199               NA's   :5199             NA's   :5199       
##  mcuentas_saldo_delta2 cprestamos_personales_delta2
##  Min.   :-59096283     Min.   :-25.000             
##  1st Qu.:   -10459     1st Qu.:  0.000             
##  Median :       50     Median :  0.000             
##  Mean   :   -12524     Mean   : -0.014             
##  3rd Qu.:    16300     3rd Qu.:  0.000             
##  Max.   : 50098272     Max.   : 14.000             
##  NA's   :5199          NA's   :5199                
##  mprestamos_personales_delta2 chomebanking_trx_delta2 mv_status07_delta2
##  Min.   :-840125.4            Min.   : -86.00         Min.   :-10.00    
##  1st Qu.:      0.0            1st Qu.:   2.00         1st Qu.:  0.00    
##  Median :      0.0            Median :  27.00         Median :  0.00    
##  Mean   :   -474.6            Mean   :  49.48         Mean   :  0.04    
##  3rd Qu.:      0.0            3rd Qu.:  69.00         3rd Qu.:  0.00    
##  Max.   :1697701.4            Max.   :2289.00         Max.   : 10.00    
##  NA's   :5199                 NA's   :5199            NA's   :5199      
##  cproductos_sobre_edad_delta2 internet_tend6    internet_avg6   
##  Min.   :-0.283               Min.   :-1.0000   Min.   :0.0000  
##  1st Qu.:-0.002               1st Qu.: 0.0000   1st Qu.:1.0000  
##  Median : 0.000               Median : 0.0000   Median :1.0000  
##  Mean   :-0.003               Mean   : 0.0011   Mean   :0.9132  
##  3rd Qu.: 0.000               3rd Qu.: 0.0000   3rd Qu.:1.0000  
##  Max.   : 0.179               Max.   : 1.0000   Max.   :1.0000  
##  NA's   :5199                 NA's   :2440      NA's   :2440    
##  cliente_edad_avg6 mrentabilidad_tend6 mrentabilidad_avg6 
##  Min.   :18.00     Min.   :-280568.2   Min.   :-101528.2  
##  1st Qu.:36.67     1st Qu.:   -429.2   1st Qu.:    671.2  
##  Median :44.50     Median :   -126.7   Median :   1561.2  
##  Mean   :46.42     Mean   :   -257.7   Mean   :   2994.0  
##  3rd Qu.:55.00     3rd Qu.:     39.2   3rd Qu.:   3178.5  
##  Max.   :99.00     Max.   :  65487.1   Max.   : 579907.8  
##  NA's   :2440      NA's   :2440        NA's   :2440       
##  mrentabilidad_annual_tend6 mactivos_margen_tend6 cproductos_tend6 
##  Min.   :-112800.7          Min.   :-34516.89     Min.   :-4.0000  
##  1st Qu.:   -337.9          1st Qu.:  -176.66     1st Qu.: 0.0000  
##  Median :    278.9          Median :   -25.87     Median : 0.0000  
##  Mean   :    939.4          Mean   :   -58.57     Mean   :-0.0184  
##  3rd Qu.:   1280.9          3rd Qu.:    31.74     3rd Qu.: 0.0000  
##  Max.   : 512022.9          Max.   : 46892.60     Max.   : 5.0000  
##  NA's   :2440               NA's   :2440          NA's   :2440     
##  mcuenta_corriente_tend6 mcuenta_corriente_avg6 mcaja_ahorro_avg6
##  Min.   :-512649.6       Min.   :-2376299       Min.   :    -62  
##  1st Qu.:    -77.2       1st Qu.:    -818       1st Qu.:   4816  
##  Median :      0.0       Median :     -54       Median :  15756  
##  Mean   :   -107.2       Mean   :    2769       Mean   :  38975  
##  3rd Qu.:     12.6       3rd Qu.:       0       3rd Qu.:  39228  
##  Max.   : 983133.2       Max.   : 8771666       Max.   :7417622  
##  NA's   :2440            NA's   :2440           NA's   :2440     
##  mdescubierto_preacordado_tend6 mcuentas_saldo_tend6 ctarjeta_visa_trx_tend6
##  Min.   :-1.1700                Min.   :-46038987    Min.   :-31.0000       
##  1st Qu.: 0.0000                1st Qu.:    -5577    1st Qu.: -0.2857       
##  Median : 0.0000                Median :     -227    Median :  0.0571       
##  Mean   :-0.0018                Mean   :   -12859    Mean   :  0.3222       
##  3rd Qu.: 0.0000                3rd Qu.:     3614    3rd Qu.:  0.8571       
##  Max.   : 1.1700                Max.   : 15551134    Max.   : 81.0000       
##  NA's   :2440                   NA's   :2440         NA's   :2440           
##  cprestamos_personales_tend6 mprestamos_personales_tend6
##  Min.   :-7.2857             Min.   :-175919.6          
##  1st Qu.: 0.0000             1st Qu.:      0.0          
##  Median : 0.0000             Median :      0.0          
##  Mean   :-0.0072             Mean   :   -228.3          
##  3rd Qu.: 0.0000             3rd Qu.:      0.0          
##  Max.   : 4.2000             Max.   :1302055.9          
##  NA's   :2440                NA's   :2440               
##  ccomisiones_mantenimiento_tend6 mcomisiones_mantenimiento_tend6
##  Min.   :-13.0286                Min.   :-14182.260             
##  1st Qu.:  0.0000                1st Qu.:     0.000             
##  Median :  0.0000                Median :     0.000             
##  Mean   : -0.0008                Mean   :     9.267             
##  3rd Qu.:  0.0000                3rd Qu.:    25.647             
##  Max.   : 25.8000                Max.   :  2423.140             
##  NA's   :2440                    NA's   :2440                   
##  mcomisiones_mantenimiento_avg6 ctransferencias_recibidas_tend6
##  Min.   :-4587.2                Min.   :-94.3714               
##  1st Qu.:    0.0                1st Qu.: -0.1143               
##  Median :    0.0                Median :  0.0000               
##  Mean   :  355.5                Mean   :  0.0427               
##  3rd Qu.:  938.2                3rd Qu.:  0.1429               
##  Max.   : 3457.9                Max.   :206.9429               
##  NA's   :2440                   NA's   :2440                   
##  ctransferencias_recibidas_avg6 mtransferencias_emitidas_avg6 tcallcenter_tend6
##  Min.   :   0.0000              Min.   :       0              Min.   :-1.0000  
##  1st Qu.:   0.3333              1st Qu.:       0              1st Qu.: 0.0000  
##  Median :   1.1667              Median :    2099              Median : 0.0000  
##  Mean   :   2.0008              Mean   :   21349              Mean   :-0.0049  
##  3rd Qu.:   2.3333              3rd Qu.:   15528              3rd Qu.: 0.0000  
##  Max.   :1388.5000              Max.   :21833000              Max.   : 1.0000  
##  NA's   :2440                   NA's   :2440                  NA's   :2440     
##  thomebanking_avg6 chomebanking_trx_tend6 chomebanking_trx_avg6
##  Min.   :0.0000    Min.   :-36.6286       Min.   :  0.000      
##  1st Qu.:0.6667    1st Qu.:  0.3714       1st Qu.:  2.167      
##  Median :1.0000    Median :  4.8286       Median :  9.833      
##  Mean   :0.7888    Mean   :  9.3475       Mean   : 16.564      
##  3rd Qu.:1.0000    3rd Qu.: 12.9429       3rd Qu.: 23.083      
##  Max.   :1.0000    Max.   :817.5000       Max.   :817.500      
##  NA's   :2440      NA's   :2440           NA's   :2440         
##  ctrx_quarter_tend6  Master_Fvencimiento_avg6 Visa_status_avg6
##  Min.   :-204.4000   Min.   :-2914741.2       Min.   :0.000   
##  1st Qu.:  -2.1429   1st Qu.:   -1322.2       1st Qu.:0.000   
##  Median :   0.7429   Median :   -1080.2       Median :0.000   
##  Mean   :   1.3080   Mean   :   -1174.7       Mean   :0.026   
##  3rd Qu.:   4.4000   3rd Qu.:    -837.2       3rd Qu.:0.000   
##  Max.   : 202.4286   Max.   :    6286.8       Max.   :8.000   
##  NA's   :2440        NA's   :17012            NA's   :6472    
##  Visa_mpagospesos_tend6 Visa_fechaalta_tend6 Visa_cconsumos_tend6
##  Min.   :-1267701.4     Min.   :-2652.00     Min.   :-52.000     
##  1st Qu.:   -2519.7     1st Qu.:   30.60     1st Qu.: -0.400     
##  Median :    -613.8     Median :   30.60     Median :  0.000     
##  Mean   :   -1736.4     Mean   :   30.32     Mean   :  0.041     
##  3rd Qu.:     363.7     3rd Qu.:   30.60     3rd Qu.:  0.457     
##  Max.   :  305955.0     Max.   :  916.33     Max.   : 66.000     
##  NA's   :17657          NA's   :6472         NA's   :17657       
##  Visa_cconsumos_avg6    mes_avg6      ctrx_quarter_normalizado_tend6
##  Min.   :  0.000     Min.   : 4.250   Min.   :-204.4000             
##  1st Qu.:  3.000     1st Qu.: 8.500   1st Qu.:  -2.2286             
##  Median :  6.833     Median : 8.500   Median :   0.6857             
##  Mean   :  9.982     Mean   : 8.592   Mean   :   1.1959             
##  3rd Qu.: 13.000     3rd Qu.: 8.500   3rd Qu.:   4.3429             
##  Max.   :203.167     Max.   :10.500   Max.   : 202.4286             
##  NA's   :17657       NA's   :2440     NA's   :2440                  
##  mv_status01_tend6 mv_status01_avg6 mv_status07_tend6  mv_Fvencimiento_tend6
##  Min.   :-9.00     Min.   :0.000    Min.   :-10.0000   Min.   :-665879.8    
##  1st Qu.: 0.00     1st Qu.:0.000    1st Qu.:  0.0000   1st Qu.:     30.6    
##  Median : 0.00     Median :0.000    Median :  0.0000   Median :     30.6    
##  Mean   : 0.02     Mean   :0.029    Mean   :  0.0116   Mean   :    127.5    
##  3rd Qu.: 0.00     3rd Qu.:0.000    3rd Qu.:  0.0000   3rd Qu.:     30.6    
##  Max.   : 9.00     Max.   :9.000    Max.   :  9.0000   Max.   :1456298.0    
##  NA's   :6044      NA's   :6044     NA's   :2440       NA's   :6044         
##  mv_mpagospesos_tend6 cproductos_sobre_edad_tend6
##  Min.   :-420234.9    Min.   :-0.1176            
##  1st Qu.:  -2375.3    1st Qu.:-0.0012            
##  Median :   -376.8    Median : 0.0000            
##  Mean   :  -1563.5    Mean   :-0.0008            
##  3rd Qu.:    245.9    3rd Qu.: 0.0000            
##  Max.   : 264815.2    Max.   : 0.1071            
##  NA's   :2440         NA's   :2440               
##  mrentabilidad_annual_sobre_edad_tend6 mcomisiones_sobre_edad_avg6
##  Min.   :-1795.495                     Min.   :-358.982           
##  1st Qu.:   -8.455                     1st Qu.:   7.151           
##  Median :    5.289                     Median :  16.626           
##  Mean   :   18.392                     Mean   :  23.408           
##  3rd Qu.:   27.311                     3rd Qu.:  30.156           
##  Max.   : 8010.485                     Max.   :3010.997           
##  NA's   :2440                          NA's   :2440               
##  mactivos_margen_sobre_edad_avg6 mrentabilidad_annual_exp_tend6
##  Min.   :-2538.838               Min.   :-4.014e+11            
##  1st Qu.:  -23.232               1st Qu.:-6.712e+06            
##  Median :   -8.163               Median : 6.952e+06            
##  Mean   :  -11.866               Mean   : 4.470e+08            
##  3rd Qu.:    0.000               3rd Qu.: 6.634e+07            
##  Max.   : 8357.994               Max.   : 5.384e+12            
##  NA's   :2440                    NA's   :2440                  
##  cliente_edad_avg3 mactivos_margen_avg3 mpasivos_margen_avg3 cproductos_tend3 
##  Min.   :18.00     Min.   :-195095.8    Min.   :-16570.0     Min.   :-4.0000  
##  1st Qu.:37.00     1st Qu.:  -1229.4    1st Qu.:   364.5     1st Qu.: 0.0000  
##  Median :45.00     Median :   -413.8    Median :   881.0     Median : 0.0000  
##  Mean   :46.54     Mean   :   -639.5    Mean   :  1890.1     Mean   :-0.0405  
##  3rd Qu.:55.00     3rd Qu.:      0.0    3rd Qu.:  1910.9     3rd Qu.: 0.0000  
##  Max.   :99.00     Max.   : 325961.8    Max.   :448388.9     Max.   : 5.0000  
##  NA's   :2440      NA's   :2440         NA's   :2440         NA's   :2440     
##  mcuenta_corriente_tend3 mcuenta_corriente_avg3 ccaja_ahorro_avg3
##  Min.   :-2946365.5      Min.   :-1393236       Min.   : 2.000   
##  1st Qu.:     -86.2      1st Qu.:    -848       1st Qu.: 2.000   
##  Median :       0.0      Median :     -30       Median : 2.000   
##  Mean   :    -188.4      Mean   :    2641       Mean   : 2.104   
##  3rd Qu.:      28.5      3rd Qu.:       0       3rd Qu.: 2.000   
##  Max.   : 2089854.0      Max.   :10426943       Max.   :10.000   
##  NA's   :2440            NA's   :2440           NA's   :2440     
##  mcaja_ahorro_avg3 mtarjeta_visa_consumo_avg3 cpayroll_trx_avg3
##  Min.   :   -120   Min.   :     0             Min.   : 0.0000  
##  1st Qu.:   4091   1st Qu.:  4236             1st Qu.: 0.0000  
##  Median :  14598   Median : 13843             Median : 0.3333  
##  Mean   :  39344   Mean   : 23837             Mean   : 0.8200  
##  3rd Qu.:  38026   3rd Qu.: 30216             3rd Qu.: 1.3333  
##  Max.   :8633318   Max.   :934011             Max.   :19.3333  
##  NA's   :2440      NA's   :2440               NA's   :2440     
##     mes_avg3       clase_ternaria  
##  Min.   : 4.667           :     0  
##  1st Qu.:10.000   BAJA+1  :   597  
##  Median :10.000   BAJA+2  :   710  
##  Mean   :10.010   CONTINUA:135979  
##  3rd Qu.:10.000                    
##  Max.   :11.000                    
##  NA's   :2440